--[[ 编码: WMS-03-03 名称: 库区-删除后 作者:HAN 日期:2025-1-29 级别:固定 (说明本段代码在项目中不太会变化) 函数: AfterDataObjDelete 功能: 1)删除【逻辑库区】 更改记录: --]] json = require ("json") mobox = require ("OILua_JavelinExt") m3 = require("oi_base_mobox") function AfterDataObjDelete ( strLuaDEID ) local nRet, strRetInfo -- step1 获取库区编码 nRet, strRetInfo = mobox.getCurEditDataObjAttr( strLuaDEID, "S_CODE" ) if ( nRet ~= 0 ) then lua.Error( strLuaDEID, debug.getinfo(1), "获取当前编辑属性失败! "..strRetInfo ) end local obj_attrs = json.decode( strRetInfo ) local area_code = obj_attrs[1].value -- 库区编码 -- 删除 【逻辑库区货位关联表】 if ( area_code ~= '') then local strCondition = "S_AREA_CODE = '" .. area_code .."'" nRet, strRetInfo = mobox.dbdeleteData(strLuaDEID, "Zone", strCondition) if (nRet ~= 0) then lua.Error( strLuaDEID, debug.getinfo(1), "删除【逻辑库区】失败!"..strRetInfo) end end end